10 POKE53280,0:POKE53281,0 20 CLR:PRINT"":PRINTCHR$(142):PRINTCHR$(147); 30 PRINT"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]" 40 PRINT"[159][221][213][192][192][201][176][174][176][174][176][192][192][174][176][174][176][174][176][174] [176][192][192][174][176][192][192][201][176][192][192][174][176][192][192][201][221]" 50 PRINT"[159][221][221][213][201][221][221][221][221][221][221][176][192][189][221][221][221][221][221][221] [221][176][192][189][221][176][201][221][221][176][192][189][221][176][201][221][221]" 60 PRINT"[221][221][173][189][221][221][221][221][221][221][173][174] [221][173][203][203][221][221] [221][173][174] [221][173][203][203][221][173][174] [221][173][203][203][221]" 70 PRINT"[154][221][221][176][174][221][221][173][189][221][221][176][189] [221][176][201][201][221][173][192][174][221][176][189] [221][176][201][201][221][176][189] [221][176][201][201][221]" 80 PRINT"[154][221][221][221][221][221][221][160][160][221][221][221] [221][221][221][221][221] [221][221][173][192][174][221][173][203][221][221][173][192][174][221][221][221][221][221]" 90 PRINT"[221][173][189][173][189][173][192][192][189][173][189] [173][189][173][189][173][192][192][189][173][192][192][189][173][192][192][203][173][192][192][189][173][189][173][189][221]" 100 PRINT"[159][221] 8 ZEILEN [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179]" 110 PRINT"[159][173][192][192][192][192][192][192][192][192][192][192][192][179] (W) 1993 VON DR.MABUSE [221]" 120 PRINT" [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]" 130 PRINT"INFO: DU KANNST ACHT ZEILEN ZU JE " 140 PRINT"[184][184][184][184][184] 20 ZEICHEN SCHREIBEN ! " 150 PRINT" DRUECKE RETURN UM DIE JEWEILIGE" 160 PRINT" EINGABE ABZUSCHLIESSEN ! " 170 PRINT" BENUTZE WEDER KOMMA [,] NOCH " 180 PRINT" DOPPELPUNKT [:] ! " 190 PRINT" DRUECKE TASTE : [_]=START [*]=ENDE " 200 GETA$:IFA$<>"_"ANDA$<>"*"THEN200 210 IFA$="*"THEN480 220 PRINTCHR$(147):PRINTCHR$(14) 230 FORX=1TO8 240 PRINT"[158] [218]EILE [146]"X;:INPUTL$(X) 250 IFLEN(L$(X))>20THENX=X-1:PRINT"[145][145]" 260 NEXT 270 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]" 280 PRINT"[218]UM [193]ENDERN EINER [218]EILE GEBE DIE " 290 PRINT"BETREFFENDE [206]UMMER ([218]AHL 1-8) EIN !" 300 PRINT"[215]ENN DEINE [197]INGABEN RICHTIG SIND, " 310 PRINT"DRUECKE [218]IFFER 9 ZUM [196]RUCKEN ! " 320 PRINT"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]" 330 GETA$:IFA$=""THEN330 340 A=VAL(A$):IFA<1ORA>9THEN330 350 IFA=9THEN390 360 POKE214,23:POKE211,0:SYS58640:PRINT" [218]EILE [146]";A;:INPUTL$(A) 370 XX=23:GOSUB490:PRINT"":FORX=1TO8:XX=X+1:GOSUB490:PRINT"[158] [218]EILE [146]"X;" "L$(X) 380 NEXT:GOTO330 390 CLOSE4:OPEN4,4,7:A$="" 400 PRINT"[147][215]ENN [196]U DIE [193]USDRUCKE STOPPEN MOECHTEST," 410 PRINT"DRUECKE [212]ASTE [[211]] BEIM [196]RUCKEN ! " 420 NC$="":INPUT"[215]IEVIELE [193]USDRUCKE BITTE ";NC$:NC=VAL(NC$) 430 IFNC<1THENRUN 440 FORP=1TONC:FORL=1TO8:PRINT#4,L$(L):NEXTL 450 GETA$:IFA$="S"THENP=NC 460 NEXTP:IFA$="S"THEN390 470 RUN 480 PRINTCHR$(147):CLR:SYS64738 490 POKE781,XX:SYS59903:RETURN